﻿Imports DAO
Imports DTO
Public Class HoaDonBUS
    Public Function LayBang() As DataTable
        'Kiem tra business rule neu co
        Dim hdDao As New HoaDonDAO()
        Dim dt As DataTable
        dt = hdDao.LayBang()
        Return dt
    End Function


    Public Function LayDanhSach() As IList
        'Kiem tra business rule neu co
        Dim hdDao As New HoaDonDAO()
        Dim ds As IList
        ds = hdDao.LayDanhSach()
        Return ds
    End Function

    'thêm
    Public Sub Them(ByVal hdDto As HoaDonDTO)
        'Kiem tra business rule neu co
        Dim hdDao As New HoaDonDAO()
        hdDao.Them(hdDto)
    End Sub
End Class
